Public Class CDocument
    Dim _dblHeight As Double
    Dim _dblWidth As Double
    Dim _dblTopM As Double
    Dim _dblBottomM As Double
    Dim _dblLeftM As Double
    Dim _dblRightM As Double
    Dim _strLayoutlbl As String
    Dim _intLayoutId As Integer
    Public Property Height() As Double
        Get
            Return _dblHeight
        End Get
        Set(ByVal value As Double)
            _dblHeight = value
        End Set
    End Property
    Public Property Width() As Double
        Get
            Return _dblWidth
        End Get
        Set(ByVal value As Double)
            _dblWidth = value
        End Set
    End Property
    Public Property TopMargin() As Double
        Get
            Return _dblTopM
        End Get
        Set(ByVal value As Double)
            _dblTopM = value
        End Set
    End Property
    Public Property BottomMargin() As Double
        Get
            Return _dblBottomM
        End Get
        Set(ByVal value As Double)
            _dblBottomM = value
        End Set
    End Property
    Public Property LeftMargin() As Double
        Get
            Return _dblLeftM
        End Get
        Set(ByVal value As Double)
            _dblLeftM = value
        End Set
    End Property
    Public Property RightMargin() As Double
        Get
            Return _dblRightM
        End Get
        Set(ByVal value As Double)
            _dblRightM = value
        End Set
    End Property
    Public Property LayoutLabel() As String
        Get
            Return _strLayoutlbl
        End Get
        Set(ByVal value As String)
            _strLayoutlbl = value
        End Set
    End Property
    Public Property LayoutId() As Integer
        Get
            Return _intLayoutId
        End Get
        Set(ByVal value As Integer)
            _intLayoutId = value
        End Set
    End Property
End Class
